home *** CD-ROM | disk | FTP | other *** search
/ CSi Master: Ableton Live 5 / CSi Master: Ableton Live 5.iso / pc / rsrc / defaults / interface / interface.cst / 00020_MI10.ls < prev    next >
Encoding:
Text File  |  2004-04-15  |  1.7 KB  |  73 lines

  1. on mouseDown
  2.   
  3.   global topicLetter, subtopicNumber,lineSelect,mediaField, Master
  4.   
  5.   
  6.   put line lineSelect of field mediaField into SSTmediaList
  7.   if item 1 of SSTmediaList = 10 then
  8.     put item 2 of SSTmediaList into mediaName
  9.   end if
  10.   if item 3 of SSTmediaList = 10 then
  11.     put item 4 of SSTmediaList into mediaName
  12.   end if
  13.   if item 5 of SSTmediaList = 10 then
  14.     put item 6 of SSTmediaList into mediaName
  15.   end if
  16.   if item 7 of SSTmediaList = 10 then
  17.     put item 8 of SSTmediaList into mediaName
  18.   end if
  19.   if item 9 of SSTmediaList = 10 then
  20.     put item 10 of SSTmediaList into mediaName
  21.   end if
  22.   if item 11 of SSTmediaList = 10 then
  23.     put item 12 of SSTmediaList into mediaName
  24.   end if
  25.   if item 13 of SSTmediaList = 10 then
  26.     put item 14 of SSTmediaList into mediaName
  27.   end if
  28.   if item 15 of SSTmediaList = 10 then
  29.     put item 16 of SSTmediaList into mediaName
  30.   end if
  31.   if item 17 of SSTmediaList = 10 then
  32.     put item 18 of SSTmediaList into mediaName
  33.   end if
  34.   if item 19 of SSTmediaList = 10 then
  35.     put item 20 of SSTmediaList into mediaName
  36.   end if
  37.   
  38.   set mediaChoice = 1.0
  39.   
  40.   global PSMdispVisible
  41.   if PSMdispVisible then
  42.     closePSMdisp
  43.     
  44.     
  45.   end if
  46.   
  47.   global textDispVisible
  48.   if textDispVisible and Master <> "MI10" then
  49.     
  50.     closeTextDisp
  51.     
  52.     if the number of cast mediaName > 0 then
  53.       put field mediaName into field "TextDispBoard"
  54.     else
  55.       put field "no text" into field "textDispBoard"
  56.     end if
  57.     
  58.     openTextDisp
  59.     set Master = "MI10"
  60.     
  61.   else
  62.     if the number of cast mediaName > 0 then
  63.       put field mediaName into field "TextDispBoard"
  64.     else
  65.       put field "no text" into field "textDispBoard"
  66.     end if
  67.     
  68.     openTextDisp
  69.     set Master = "MI10"
  70.   end if
  71.   
  72.   
  73. end